Belgian Amiga Club - ADF Collection/BS1 part 34.zip/BS1 part 34/GFA basic training.adf/Copper/DUALCOPPER.GFA

GFA-BASIC Amiga | 1989-06-01 | 5KB | 221 lines

GFA-AMIGAB
ALTCOP
U_COPADR
NEU_COPADR
STARTCOP
ZEIGER
COPPERLIST1
COPPERLIST2
COPPER_INIT
USER_COPPER1_AN
USER_COPPER2_AN
USER_COPPER_AUS
USERCOP1_LAENGE
USERCOP2_LAENGE
MEMORY_COPPERBEREIT
DATAS
DATAS2
USERCOP1_L
USERCOP2_L
Verwaltung von zwei Copperlisten
Bunt nicht?!FF
Bunt nicht?!FF
 Das erste Label f
r die RESTORE-Anweisung
$0180,$0000
$7701,$fffe
$0180,$0f00
$7801,$fffe
$0180,$0f10
$7901,$fffe
$0180,$0f20
$7a01,$fffe
$0180,$0f40
$7b01,$fffe
$0180,$0f60
$7c01,$fffe
$0180,$0f70
$7d01,$fffe
$0180,$0f80
$7e01,$fffe
$0180,$0f90
$7f01,$fffe
$0180,$0fa0
$8001,$fffe
$0180,$0fb0
$8101,$fffe
$0180,$0fc0
$8201,$fffe
$0180,$0fd0
$8301,$fffe
$0180,$0fe0
$8401,$fffe
$0180,$0ff0
$8501,$fffe
$0180,$0ff1
$8601,$fffe
$0180,$0ff2
$8701,$fffe
$0180,$0ff3
$8801,$fffe
$0180,$0ff4
$8901,$fffe
$0180,$0ff5
$8a01,$fffe
$0180,$0ef5
$8b01,$fffe
$0180,$0df5
$8c01,$fffe
$0180,$0cf5
$8d01,$fffe
$0180,$0bf4
$8e01,$fffe
$0180,$0af3
$8f01,$fffe
$0180,$09f2
$9001,$fffe
$0180,$08f1
$9101,$fffe
$0180,$07f2
$9201,$fffe
$0180,$06e3
$9301,$fffe
$0180,$06d3
$9401,$fffe
$0180,$06c3
$9501,$fffe
$0180,$06b3
$9601,$fffe
$0180,$06a3
$9801,$fffe
$0180,$0693
$9901,$fffe
$0180,$0683
$9a01,$fffe
$0180,$0673
$9b01,$fffe
$0180,$0664
$9c01,$fffe
$0180,$0655
$9d01,$fffe
$0180,$0555
$9e01,$fffe
$0180,$0546
$9f01,$fffe
$0180,$0
$ffff
 Das zweite Label f
r die RESTORE-Anweisung
$0180,$0000
$d701,$fffe
$0180,$0f00
$d801,$fffe
$0180,$0f10
$d901,$fffe
$0180,$0f20
$da01,$fffe
$0180,$0f40
$db01,$fffe
$0180,$0f60
$dc01,$fffe
$0180,$0f70
$dd01,$fffe
$0180,$0f80
$de01,$fffe
$0180,$0f90
$df01,$fffe
$0180,$0fa0
$e001,$fffe
$0180,$0fb0
$e101,$fffe
$0180,$0fc0
$e201,$fffe
$0180,$0fd0
$e301,$fffe
$0180,$0fe0
$e401,$fffe
$0180,$0ff0
$e501,$fffe
$0180,$0ff1
$e601,$fffe
$0180,$0ff2
$e701,$fffe
$0180,$0ff3
$e801,$fffe
$0180,$0ff4
$e901,$fffe
$0180,$0ff5
$ea01,$fffe
$0180,$0ef5
$eb01,$fffe
$0180,$0df5
$ec01,$fffe
$0180,$0cf5
$ed01,$fffe
$0180,$0bf4
$ee01,$fffe
$0180,$0af3
$ef01,$fffe
$0180,$09f2
$f001,$fffe
$0180,$08f1
$f101,$fffe
$0180,$07f2
$f201,$fffe
$0180,$06e3
$f301,$fffe
$0180,$06d3
$f401,$fffe
$0180,$06c3
$f501,$fffe
$0180,$06b3
$f601,$fffe
$0180,$06a3
$f801,$fffe
$0180,$0693
$f901,$fffe
$0180,$0683
$fa01,$fffe
$0180,$0673
$fb01,$fffe
$0180,$0664
$fc01,$fffe
$0180,$0655
$fd01,$fffe
$0180,$0555
$fe01,$fffe
$0180,$0546
$ff01,$fffe
$0180,$0
$ffff
 Anzahl Worte
 Anzahl Bytes
 Anzahl Worte
 Anzahl Bytes
 76 Bytes werden noch vom System
bernommen
 76 Bytes werden noch vom System
bernommen
 Copper-Automatik-Vector relativ zu GFXBASE retten
 Anfang der Daten die
bernommen werden m
 Anfang der Daten die
bernommen werden m
 Chipmemory belegen in errechneter Gr
 Zweimal speichern (Zaehler und
bergabe)
       Startliste des Systems Kopieren
 60 sind schon drin, darum um 60 erh
       Unsere Liste
Daten schreiben
       End Liste des Systems kopieren
 Warten auf Vblank, damit Copper nicht ausliest
 (Unsere) Adresse in den Auto-Vector schreiben
 Warten auf Vblank, damit Copper nicht ausliest
 (Unsere) Adresse in den Auto-Vector schreiben
 Warten, damit Copper nicht st
 Vector zur
ckschreiben (System-Datenliste)
 1.User-Coplistspeicher Frei!
 2.User-Coplistspeicher Frei!